home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / MPW / GCC 1.37.1r15 / Tests / bug-stack-adj.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-01-03  |  420 b   |  30 lines  |  [TEXT/MPS ]
  1. /* Compile with -fomit-frame-pointer, should adjust stack by 4, not 8, after
  2.    returning from trap.
  3.  
  4. gc -p -fomit-frame-pointer bug-stack-adj.c ; dumpobj bug-stack-adj.c.o
  5.    
  6.    */
  7.  
  8. struct Point {
  9.  short v;
  10.  short h;
  11. };
  12.  
  13. typedef struct Point Point;
  14.  
  15. pascal void GlobalToLocal(Point *pt)
  16.     = 0xA871;
  17.  
  18. Point glob;
  19.  
  20. Point ToLocal(Point pt)                    
  21. { 
  22.     GlobalToLocal(&pt); 
  23.     return pt;
  24. }
  25.  
  26. main()
  27. {
  28.     glob = ToLocal(glob);
  29. }
  30.